home *** CD-ROM | disk | FTP | other *** search
/ Alles Voor Internet / Tout Pour Internet / alles voor internet.iso / MacInternet™ / Unix / getit.shar / getit next >
Encoding:
Text File  |  1993-07-26  |  819 b   |  30 lines
  1. #!/usr/bin/csh
  2.  
  3. if  $#argv == 0 then
  4.  echo " Usage: getit filename"
  5.  echo "        GetIt v1.0 David C. Johnson (johnson@wrs.com)"
  6.  exit
  7. else
  8.  
  9. set INPUT = $argv[1]
  10. set SUPPORT_FILES_DIR = $HOME/bin
  11. set NEW_DIR_NAME = "new-umich-files.`date +%h-%d-%T`"
  12.  
  13. mkdir $NEW_DIR_NAME
  14. echo "/" | cat $INPUT - > $NEW_DIR_NAME/mac.temp.temp.temp # isn't that cute :-)
  15. perl $SUPPORT_FILES_DIR/prnumich $NEW_DIR_NAME/mac.temp.temp.temp > $NEW_DIR_NAME/umich.files
  16. cd $NEW_DIR_NAME
  17. rm mac.temp.temp.temp
  18. echo "bye" | cat umich.files - > mac.temp.temp.temp
  19. rm umich.files
  20. mv mac.temp.temp.temp umich.files
  21. sh $SUPPORT_FILES_DIR/getumich
  22.  
  23. rm mac.archive.umich.edu.*    # comment out to save log transcript files
  24. rm umich.files            # comment out to save parsed ftp input file
  25. #rm ../$INPUT            # comment out to save original input file
  26.  
  27. exit
  28. endif
  29. exit
  30.